home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1998 May
/
EnigmA AMIGA RUN 27 (1998)(G.R. Edizioni)(IT)[!][issue 1998-05].iso
/
earcd
/
giochi
/
myst-demo
/
demo_myst.aga
< prev
next >
Wrap
Text File
|
1998-03-11
|
801b
|
35 lines
; Set up paths
C/Assign C: C ADD
Assign Devs: Devs ADD
Assign Libs: Libs ADD
; Check if ENV:Sys/ahi.prefs is good enough
If EXISTS ENV:Sys/ahi.prefs
Lab loop
CheckAHIPrefs ENV:Sys/ahi.prefs 0 > T:tmp.1
If WARN
RequestChoice >T:tmp.2 "Warning" "Your current AHI preferences are unsuitable because:*N`type T:tmp.1`" "Edit AHI preferences" "Use MYST preferences to play (recommended)" "I don't care, try to run MYST this way"
If `type T:tmp.2` EQ 1
Prefs/AHI
Skip loop BACK
EndIf
If `type T:tmp.2` EQ 2
Copy Env ENV: ALL QUIET
EndIf
EndIf
Else
Copy Env ENV: ALL QUIET
Endif
; Launch Myst
stack 30000 >NIL:
DEMO_Myst_AGA.exe >NIL:
; Clean up
Delete >NIL: T:tmp.?
Assign Libs: Libs REMOVE
Assign Devs: Devs REMOVE
Assign C: C REMOVE
C/Avail <>NIL: FLUSH